From: Mattias Engdegård <mattiase@acm.org>
Date: Fri, 29 Mar 2024 14:23:56 +0000 (+0100)
Subject: * src/fns.c (Fvaluelt): More generous depth limit (20 -> 200).
X-Git-Tag: archive/raspbian/1%30.1+1-3+rpi1^2~14^2~18^2~2107
X-Git-Url: https://dgit.raspbian.org/%22http://www.example.com/cgi/%22/%22http:/www.example.com/cgi/%22?a=commitdiff_plain;h=d2d5e514397c453bbaa6e7fc3441af2d538eb3cf;p=emacs.git

* src/fns.c (Fvaluelt): More generous depth limit (20 -> 200).

This gives `value<` the same limit as `equal` which seems about right.
---

diff --git a/src/fns.c b/src/fns.c
index 8d8783713ab..db5e856d5bd 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -3201,7 +3201,7 @@ Buffers and processes are compared by name.
 Other types are considered unordered and the return value will be `nil'.  */)
   (Lisp_Object a, Lisp_Object b)
 {
-  int maxdepth = 20;		  /* FIXME: arbitrary value */
+  int maxdepth = 200;		  /* FIXME: arbitrary value */
   return value_cmp (a, b, maxdepth) < 0 ? Qt : Qnil;
 }